home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 2 of 2).iso / cheats / eq_new / def / tie.bak < prev    next >
Text File  |  1995-03-02  |  23KB  |  1,204 lines

  1. // This file is (C) 1994 - GLENN HANCOCK
  2.  
  3. DEFTITLE("TIE Fighter");
  4. DIR("C:\TIE");
  5. PROGRAM("TIE.EXE");
  6. UNIQUE("GMIDI.MDR;SETMUSE.NON;");
  7. REGISTEREDONLY;
  8. SOURCEVERSION('100');
  9. DISKSOURCE;
  10. GLENN;
  11. BACKGROUND("STARS.BGP");
  12. SETEQENV('FIELD=GRAY');
  13. SETEQENV('FIELDTEXT=White');
  14. SETEQENV('FIELDHIGHLIGHT=RED');
  15. SETEQENV('BUTTONTEXT=GRAY');
  16.  
  17. STRING FN;
  18. INT D,N,R,HistCompOff,HistScoreOff;
  19.  
  20. (*---------------------------------------------------------------*)
  21.  
  22. PROC FSEL;
  23.  
  24.  FIELDSTART(75);
  25.  
  26.   D := 0;
  27.   N := GetFileList($(100),"*.TFR");
  28.   R := 100;
  29.  
  30.   IF (N>0)
  31.     List('Please Choose A Pilot to Edit:');
  32.       VAR(R);
  33.       while D<N
  34.         D:=D+1;
  35.         Assign(99+D,$(99+D));
  36.       endwhile;
  37.     EndList;
  38.   ENDIF;
  39.  
  40.   IF (N=0)
  41.     MESSAGE('There are no Pilots in your TIE',
  42.             'Directory.  Please Play TIE Fighter ',
  43.             'and Save Your Game.');
  44.     Quit;
  45.   ENDIF;
  46.  
  47.   BUTTON(25,190,"Edit Misc. Info.","",Pg2);
  48.   HELP(590,190,"HLP;MISC");
  49.   BUTTON(25,240,"Edit Training Stats.","",Pg3);
  50.   HELP(590,240,"HLP;TRAIN");
  51.   BUTTON(25,290,"Edit Hist. Miss.","",Pg4);
  52.   HELP(590,290,"HLP;HIST");
  53.   BUTTON(25,340,"Edit War Status","",Pg10);
  54.   HELP(590,340,"HLP;WAR");
  55.  
  56. ENDPROC; // FSEL
  57.  
  58. (*---------------------------------------------------------------*)
  59.  
  60. PROC Pg2;
  61.  
  62.   FN := $(R);
  63.   OPEN(FN);
  64.  
  65.   GOTOPAGE(2);
  66.  
  67. ENDPROC;  //  Pg2
  68.  
  69. (*---------------------------------------------------------------*)
  70.  
  71. PROC Pg3;
  72.  
  73.   FN := $(R);
  74.   OPEN(FN);
  75.  
  76.   GOTOPAGE(3);
  77.  
  78. ENDPROC;  //  Pg3
  79.  
  80. (*---------------------------------------------------------------*)
  81.  
  82. PROC Pg4;
  83.  
  84.   FN := $(R);
  85.   OPEN(FN);
  86.  
  87.   GOTOPAGE(4);
  88.  
  89. ENDPROC;  //  Pg4
  90.  
  91. (*---------------------------------------------------------------*)
  92.  
  93. PROC Pg10;
  94.  
  95.   FN := $(R);
  96.   OPEN(FN);
  97.  
  98.   GOTOPAGE(10);
  99.  
  100. ENDPROC;  //  Pg10
  101.  
  102. (*---------------------------------------------------------------*)
  103.  
  104. PROC Pg11;
  105.  
  106.   GOTOPAGE(11);
  107.  
  108. ENDPROC;  //  Pg11
  109.  
  110. (*---------------------------------------------------------------*)
  111.  
  112. PROC Pg12;
  113.  
  114.   GOTOPAGE(12);
  115.  
  116. ENDPROC;  //  Pg12
  117.  
  118. (*---------------------------------------------------------------*)
  119.  
  120. PROC Pg13;
  121.  
  122.   GOTOPAGE(13);
  123.  
  124. ENDPROC;  //  Pg13
  125.  
  126. (*---------------------------------------------------------------*)
  127.  
  128. PROC Pg14;
  129.  
  130.   GOTOPAGE(14);
  131.  
  132. ENDPROC;  //  Pg14
  133.  
  134. (*---------------------------------------------------------------*)
  135.  
  136. PROC Pg15;
  137.  
  138.   GOTOPAGE(15);
  139.  
  140. ENDPROC;  //  Pg15
  141.  
  142. (*---------------------------------------------------------------*)
  143.  
  144. PROC Pg16;
  145.  
  146.   GOTOPAGE(16);
  147.  
  148. ENDPROC;  //  Pg16
  149.  
  150. (*---------------------------------------------------------------*)
  151.  
  152. PROC Pg17;
  153.  
  154.   GOTOPAGE(17);
  155.  
  156. ENDPROC;  //  Pg17
  157.  
  158. (*---------------------------------------------------------------*)
  159.  
  160. PROC DRAWHIST;
  161.  
  162.  FIELDSTART(120);
  163.  
  164.   DIALOGSTRING(43,100,"^E^*^UCompleted?");
  165.   DIALOGSTRING(430,100,"^E^*^UTotal Score");
  166.  
  167.   FIELD("Mission 1");
  168.    SMALLFIELD;
  169.     NAME(FN,HistCompOff,T_BYTE);
  170.     ASSIGN(0,"No","Yes");
  171.     RANGE(0,1);
  172.     HELP(590,20,"HLP;HISTPAGE");
  173.   ENDFIELD;
  174.  
  175.   FIELD("Mission 2");
  176.    SMALLFIELD;
  177.     NAME(FN,(HistCompOff+1),T_BYTE);
  178.     ASSIGN(0,"No","Yes");
  179.     RANGE(0,1);
  180.   ENDFIELD;
  181.  
  182.   FIELD("Mission 3");
  183.    SMALLFIELD;
  184.     NAME(FN,(HistCompOff+2),T_BYTE);
  185.     ASSIGN(0,"No","Yes");
  186.     RANGE(0,1);
  187.   ENDFIELD;
  188.  
  189.   FIELD("Mission 4");
  190.    SMALLFIELD;
  191.     NAME(FN,(HistCompOff+3),T_BYTE);
  192.     ASSIGN(0,"No","Yes");
  193.     RANGE(0,1);
  194.   ENDFIELD;
  195.  
  196.  
  197.  
  198.  
  199.   FIELD("");              // 1
  200.     NAME(FN,HistScoreOff,T_LONG);
  201.    Range(0,1000000);
  202.    INC(100);
  203.    XYOVERRIDE(370,120);
  204.   ENDFIELD;
  205.  
  206.   FIELD("");              // 2
  207.     NAME(FN,(HistScoreOff+4),T_LONG);
  208.    Range(0,1000000);
  209.    INC(100);
  210.    XYOVERRIDE(370,180);
  211.   ENDFIELD;
  212.  
  213.   FIELD("");              // 3
  214.     NAME(FN,(HistScoreOff+8),T_LONG);
  215.    Range(0,1000000);
  216.    INC(100);
  217.    XYOVERRIDE(370,240);
  218.   ENDFIELD;
  219.  
  220.   FIELD("");              // 4
  221.     NAME(FN,(HistScoreOff+12),T_LONG);
  222.    Range(0,1000000);
  223.    INC(100);
  224.    XYOVERRIDE(370,300);
  225.   ENDFIELD;
  226.  
  227. ENDPROC;  //  DRAWHIST
  228.  
  229. (*---------------------------------------------------------------*)
  230.  
  231.  
  232. PAGE(1);
  233.  SETTITLE("TIE Fighter");
  234.  NEXTPAGE(1);
  235.  
  236.   FSEL;
  237.  
  238. ENDPAGE;  //  1
  239.  
  240.  
  241. Page(2);
  242.  
  243.  NEXTPAGE(1);
  244.  
  245.  SETTITLE("TIE Fighter ("+FN+")");
  246.  FIELDSPACE(40);
  247.  
  248.   FIELD("Duty Status");
  249.     NAME(FN,1,T_BYTE);
  250.     ASSIGN(0,"Alive","Captured","Dead");
  251.     RANGE(0,2);
  252.   ENDFIELD;
  253.  
  254.   Field("Rank");
  255.    Name(FN,2,T_BYTE);
  256.    ASSIGN(0,"Flight Cadet","Flight Officer","Lieutenant");
  257.    ASSIGN(3,"Captain","Commander","General");
  258.    RANGE(0,5);
  259.   EndField;
  260.  
  261.   FIELD("Difficulty");
  262.     NAME(FN,3,T_BYTE);
  263.     ASSIGN(0,"Easy","Medium","Hard");
  264.     RANGE(0,2);
  265.   ENDFIELD;
  266.  
  267.   FIELD("Total Score");
  268.     NAME(FN,4,T_LONG);
  269.     Range(0,1000000);
  270.     INC(100);
  271.   ENDFIELD;
  272.  
  273.   FIELD("Experience");
  274.     NAME(FN,8,T_WORD);
  275.     HELP("HLP;XP");
  276.     INC(10);
  277.   ENDFIELD;
  278.  
  279.   FIELD("Secret Order Ranking");
  280.     NAME(FN,10,T_BYTE);
  281.     ASSIGN(0,"None","First Initiate","Second Circle","Third Circle");
  282.     ASSIGN(4,"Fourth Circle","Fifth Circle","Emperor''s Hand");
  283.     RANGE(0,6);
  284.   ENDFIELD;
  285.  
  286.   FIELD("Total Kills");
  287.     NAME(FN,1626,T_WORD);
  288.     RANGE(0,60000);
  289.     INC(10);
  290.   ENDFIELD;
  291.  
  292.   FIELD("Times Captured");
  293.     NAME(FN,1628,T_WORD);
  294.     RANGE(0,60000);
  295.     INC(10);
  296.   ENDFIELD;
  297.  
  298.   FIELD("Craft Lost");
  299.     NAME(FN,1926,T_WORD);
  300.     RANGE(0,60000);
  301.     INC(10);
  302.   ENDFIELD;
  303.  
  304. ENDPAGE;  //  2
  305.  
  306.  
  307. PAGE(3);
  308.  
  309.  PREVPAGE(1);
  310.  NEXTPAGE(1);
  311.  
  312.  SETTITLE("TIE Fighter ("+FN+")","Training Stats");
  313.  
  314.  FIELDSTART(120);
  315.  FIELDSPACE(45);
  316.  
  317.   DIALOGSTRING(23,100,"^E^*^U# of Levels Completed");
  318.   DIALOGSTRING(440,100,"^E^*^UTotal Scores");
  319.  
  320.   FIELD("Fighter");
  321.    SMALLFIELD;
  322.     NAME(FN,90,T_BYTE);
  323.    HELP(590,20,"HLP;TLVL");
  324.   ENDFIELD;
  325.  
  326.   FIELD("Interceptor");
  327.    SMALLFIELD;
  328.     NAME(FN,91,T_BYTE);
  329.   ENDFIELD;
  330.  
  331.   FIELD("Bomber");
  332.    SMALLFIELD;
  333.     NAME(FN,92,T_BYTE);
  334.   ENDFIELD;
  335.  
  336.   FIELD("Advanced");
  337.    SMALLFIELD;
  338.     NAME(FN,93,T_BYTE);
  339.   ENDFIELD;
  340.  
  341.   FIELD("Gunboat");
  342.    SMALLFIELD;
  343.     NAME(FN,94,T_BYTE);
  344.   ENDFIELD;
  345.  
  346.   FIELD("Defender");
  347.    SMALLFIELD;
  348.     NAME(FN,95,T_BYTE);
  349.   ENDFIELD;
  350.  
  351.   FIELD("");              // F
  352.     NAME(FN,42,T_LONG);
  353.    Range(0,1000000);
  354.    INC(100);
  355.    XYOVERRIDE(370,120);
  356.   ENDFIELD;
  357.  
  358.   FIELD("");              // I
  359.     NAME(FN,46,T_LONG);
  360.    INC(100);
  361.    XYOVERRIDE(370,165);
  362.   ENDFIELD;
  363.  
  364.   FIELD("");              // B
  365.     NAME(FN,50,T_LONG);
  366.    Range(0,1000000);
  367.    INC(100);
  368.    XYOVERRIDE(370,210);
  369.   ENDFIELD;
  370.  
  371.   FIELD("");              // A
  372.     NAME(FN,54,T_LONG);
  373.    Range(0,1000000);
  374.    INC(100);
  375.    XYOVERRIDE(370,255);
  376.   ENDFIELD;
  377.  
  378.   FIELD("");              // G
  379.     NAME(FN,58,T_LONG);
  380.    Range(0,1000000);
  381.    INC(100);
  382.    XYOVERRIDE(370,300);
  383.   ENDFIELD;
  384.  
  385.   FIELD("");              // D
  386.     NAME(FN,62,T_LONG);
  387.    Range(0,1000000);
  388.    INC(100);
  389.    XYOVERRIDE(370,345);
  390.   ENDFIELD;
  391.  
  392.  
  393. ENDPAGE;  //  3
  394.  
  395.  
  396. PAGE(4);
  397.  
  398. PREVPAGE(1);
  399.  
  400.  SETTITLE("TIE Fighter ("+FN+")","Hist. Miss. (TIE Fighter)");
  401.  
  402.   HistCompOff := 520;
  403.   HistScoreOff := 136;
  404.  
  405.   DRAWHIST;
  406.  
  407. ENDPAGE;  //  4
  408.  
  409.  
  410. PAGE(5);
  411.  
  412.  SETTITLE("TIE Fighter ("+FN+")","Hist. Miss. (TIE Interceptor)");
  413.  
  414.   HistCompOff := 528;
  415.   HistScoreOff := 168;
  416.  
  417.   DRAWHIST;
  418.  
  419. ENDPAGE;  //  5
  420.  
  421.  
  422. PAGE(6);
  423.  
  424.  SETTITLE("TIE Fighter ("+FN+")","Hist. Miss. (TIE Bomber)");
  425.  
  426.   HistCompOff := 536;
  427.   HistScoreOff := 200;
  428.  
  429.   DRAWHIST;
  430.  
  431. ENDPAGE;  //  6
  432.  
  433.  
  434. PAGE(7);
  435.  
  436.  SETTITLE("TIE Fighter ("+FN+")","Hist. Miss. (TIE Advanced)");
  437.  
  438.   HistCompOff := 544;
  439.   HistScoreOff := 232;
  440.  
  441.   DRAWHIST;
  442.  
  443. ENDPAGE;  //  7
  444.  
  445.  
  446. PAGE(8);
  447.  
  448.  SETTITLE("TIE Fighter ("+FN+")","Hist. Miss. (Assault Gunboat)");
  449.  
  450.   HistCompOff := 552;
  451.   HistScoreOff := 264;
  452.  
  453.   DRAWHIST;
  454.  
  455. ENDPAGE;  //  8
  456.  
  457.  
  458. PAGE(9);
  459.  
  460.  NEXTPAGE(1);
  461.  
  462.  SETTITLE("TIE Fighter ("+FN+")","Hist. Miss. (TIE Defender)");
  463.  
  464.   HistCompOff := 560;
  465.   HistScoreOff := 296;
  466.  
  467.   DRAWHIST;
  468.  
  469. ENDPAGE;  //  9
  470.  
  471.  
  472.  
  473.  
  474. PAGE(10);
  475.  
  476.  INT PGBUTT;
  477.  
  478.  
  479.  NEXTPAGE(1);
  480.  PREVPAGE(1);
  481.  
  482.  SETTITLE("TIE Fighter ("+FN+")","War Status");
  483.  FIELDSPACE(40);
  484.  Fieldstart(120);
  485.  
  486.   DIALOGSTRING(85,100,"^E^*^UBattle Status");
  487.   DIALOGSTRING(290,100,"^E^*^ULast Miss. Comp.");
  488.   DIALOGSTRING(495,100,"^E^*^UEdit Score");
  489.  
  490.   FIELD("");
  491.     NAME(FN,617,T_BYTE);
  492.     ASSIGN(0,"Inactive","Active","Pending","Done");
  493.     Range(0,3);
  494.     HELP(590,20,"HLP;WARPAGE");
  495.  
  496.   ENDFIELD;
  497.  
  498.   FIELD("");
  499.     NAME(FN,618,T_BYTE);
  500.     ASSIGN(0,"Inactive","Active","Pending","Done");
  501.     Range(0,3);
  502.   ENDFIELD;
  503.  
  504.   FIELD("");
  505.     NAME(FN,619,T_BYTE);
  506.     ASSIGN(0,"Inactive","Active","Pending","Done");
  507.     Range(0,3);
  508.   ENDFIELD;
  509.  
  510.   FIELD("");
  511.     NAME(FN,620,T_BYTE);
  512.     ASSIGN(0,"Inactive","Active","Pending","Done");
  513.     Range(0,3);
  514.   ENDFIELD;
  515.  
  516.   FIELD("");
  517.     NAME(FN,621,T_BYTE);
  518.     ASSIGN(0,"Inactive","Active","Pending","Done");
  519.     Range(0,3);
  520.   ENDFIELD;
  521.  
  522.   FIELD("");
  523.     NAME(FN,622,T_BYTE);
  524.     ASSIGN(0,"Inactive","Active","Pending","Done");
  525.     Range(0,3);
  526.   ENDFIELD;
  527.  
  528.   FIELD("");
  529.     NAME(FN,623,T_BYTE);
  530.     ASSIGN(0,"Inactive","Active","Pending","Done");
  531.     Range(0,3);
  532.   ENDFIELD;
  533.  
  534.  
  535.  
  536.  
  537.   FIELD("");              // 1
  538.    SMALLFIELD;
  539.    NAME(FN,637,T_BYTE);
  540.    Range(0,6);
  541.    XYOVERRIDE(300,120);
  542.   ENDFIELD;
  543.  
  544.   FIELD("");              // 2
  545.    SMALLFIELD;
  546.    NAME(FN,638,T_BYTE);
  547.    Range(0,5);
  548.    XYOVERRIDE(300,160);
  549.   ENDFIELD;
  550.  
  551.   FIELD("");              // 3
  552.    SMALLFIELD;
  553.    NAME(FN,639,T_BYTE);
  554.    Range(0,6);
  555.    XYOVERRIDE(300,200);
  556.   ENDFIELD;
  557.  
  558.   FIELD("");              // 4
  559.    SMALLFIELD;
  560.    NAME(FN,640,T_BYTE);
  561.    Range(0,5);
  562.    XYOVERRIDE(300,240);
  563.   ENDFIELD;
  564.  
  565.   FIELD("");              // 5
  566.    SMALLFIELD;
  567.    NAME(FN,641,T_BYTE);
  568.    Range(0,5);
  569.    XYOVERRIDE(300,280);
  570.   ENDFIELD;
  571.  
  572.   FIELD("");              // 6
  573.    SMALLFIELD;
  574.    NAME(FN,642,T_BYTE);
  575.    Range(0,4);
  576.    XYOVERRIDE(300,320);
  577.   ENDFIELD;
  578.  
  579.   FIELD("");              // 7
  580.    SMALLFIELD;
  581.    NAME(FN,643,T_BYTE);
  582.    Range(0,5);
  583.    XYOVERRIDE(300,360);
  584.   ENDFIELD;
  585.  
  586.  
  587.  
  588.  
  589.   PGBUTT := 0;
  590.  
  591.   DRAWBUTTON(470,120+PGBUTT,628,160+PGBUTT);
  592.   DialogString(490,147+PGBUTT,'^1^*^8 Battle 1');
  593.   FREEAREA(470,120+PGBUTT,628,420+PGBUTT,Pg11);
  594.  
  595.   PGBUTT := (PGBUTT+40);
  596.  
  597.   DRAWBUTTON(470,120+PGBUTT,628,160+PGBUTT);
  598.   DialogString(490,147+PGBUTT,'^1^*^8 Battle 2');
  599.   FREEAREA(470,120+PGBUTT,628,420+PGBUTT,Pg12);
  600.  
  601.   PGBUTT := (PGBUTT+40);
  602.  
  603.   DRAWBUTTON(470,120+PGBUTT,628,160+PGBUTT);
  604.   DialogString(490,147+PGBUTT,'^1^*^8 Battle 3');
  605.   FREEAREA(470,120+PGBUTT,628,420+PGBUTT,Pg13);
  606.  
  607.   PGBUTT := (PGBUTT+40);
  608.  
  609.   DRAWBUTTON(470,120+PGBUTT,628,160+PGBUTT);
  610.   DialogString(490,147+PGBUTT,'^1^*^8 Battle 4');
  611.   FREEAREA(470,120+PGBUTT,628,420+PGBUTT,Pg14);
  612.  
  613.   PGBUTT := (PGBUTT+40);
  614.  
  615.   DRAWBUTTON(470,120+PGBUTT,628,160+PGBUTT);
  616.   DialogString(490,147+PGBUTT,'^1^*^8 Battle 5');
  617.   FREEAREA(470,120+PGBUTT,628,420+PGBUTT,Pg15);
  618.  
  619.   PGBUTT := (PGBUTT+40);
  620.  
  621.   DRAWBUTTON(470,120+PGBUTT,628,160+PGBUTT);
  622.   DialogString(490,147+PGBUTT,'^1^*^8 Battle 6');
  623.   FREEAREA(470,120+PGBUTT,628,420+PGBUTT,Pg16);
  624.  
  625.   PGBUTT := (PGBUTT+40);
  626.  
  627.   DRAWBUTTON(470,120+PGBUTT,628,160+PGBUTT);
  628.   DialogString(490,147+PGBUTT,'^1^*^8 Battle 7');
  629.   FREEAREA(470,120+PGBUTT,628,420+PGBUTT,Pg17);
  630.  
  631.  
  632.  
  633. ENDPAGE;  //  10
  634.  
  635.  
  636.  
  637.  
  638.  
  639. PAGE(11);
  640.  
  641.   NEXTPAGE(10);
  642.   PREVPAGE(10);
  643.  
  644.   SETTITLE("TIE Fighter ("+FN+")","Battle 1, The Aftermath of Hoth (Scores)");
  645.   FIELDSPACE(50);
  646.   Fieldstart(100);
  647.  
  648.     INT SOff,First;
  649.  
  650.     SOff := 0;
  651.     First := 986;
  652.  
  653.     FIELD("Mis 1, Patrol Jump Point D-34");
  654.       NAME(FN,(First+SOff),T_LONG);
  655.       RANGE(0,1000000);
  656.       INC(100);
  657.     ENDFIELD;
  658.  
  659.     SOff := (SOff+4);
  660.  
  661.     FIELD("Mis 2, Red Alert");
  662.       NAME(FN,(First+SOff),T_LONG);
  663.       RANGE(0,1000000);
  664.       INC(100);
  665.     ENDFIELD;
  666.  
  667.     SOff := (SOff+4);
  668.  
  669.     FIELD("Mis 3, Counter-Attack");
  670.       NAME(FN,(First+SOff),T_LONG);
  671.       RANGE(0,1000000);
  672.       INC(100);
  673.     ENDFIELD;
  674.  
  675.     SOff := (SOff+4);
  676.  
  677.     FIELD("Mis 4, Outpost D-34 Has Fallen");
  678.       NAME(FN,(First+SOff),T_LONG);
  679.       RANGE(0,1000000);
  680.       INC(100);
  681.     ENDFIELD;
  682.  
  683.     SOff := (SOff+4);
  684.  
  685.     FIELD("Mis 5, Attack Rebel Lt. Cruiser");
  686.       NAME(FN,(First+SOff),T_LONG);
  687.       RANGE(0,1000000);
  688.       INC(100);
  689.     ENDFIELD;
  690.  
  691.     SOff := (SOff+4);
  692.  
  693.     FIELD("Mis 6, Destroy the Lulsa");
  694.       NAME(FN,(First+SOff),T_LONG);
  695.       RANGE(0,1000000);
  696.       INC(100);
  697.     ENDFIELD;
  698.  
  699.     SOff := (SOff+4);
  700.  
  701.  
  702. ENDPAGE;  //  11
  703.  
  704.  
  705. PAGE(12);
  706.  
  707.   NEXTPAGE(10);
  708.   PREVPAGE(10);
  709.  
  710.   SETTITLE("TIE Fighter ("+FN+")","Battle 2, The Sepan Civil War (Scores)");
  711.   FIELDSPACE(60);
  712.   Fieldstart(100);
  713.  
  714.     INT SOff,First;
  715.  
  716.     SOff := 0;
  717.     First := 1018;
  718.  
  719.     FIELD("Mis 1, Respond to S.O.S.");
  720.       NAME(FN,(First+SOff),T_LONG);
  721.       RANGE(0,1000000);
  722.       INC(100);
  723.     ENDFIELD;
  724.  
  725.     SOff := (SOff+4);
  726.  
  727.     FIELD("Mis 2, Intercept Attack");
  728.       NAME(FN,(First+SOff),T_LONG);
  729.       RANGE(0,1000000);
  730.       INC(100);
  731.     ENDFIELD;
  732.  
  733.     SOff := (SOff+4);
  734.  
  735.     FIELD("Mis 3, Rescue War Refugees");
  736.       NAME(FN,(First+SOff),T_LONG);
  737.       RANGE(0,1000000);
  738.       INC(100);
  739.     ENDFIELD;
  740.  
  741.     SOff := (SOff+4);
  742.  
  743.     FIELD("Mis 4, Capture Enemies");
  744.       NAME(FN,(First+SOff),T_LONG);
  745.       RANGE(0,1000000);
  746.       INC(100);
  747.     ENDFIELD;
  748.  
  749.     SOff := (SOff+4);
  750.  
  751.     FIELD("Mis 5, Guard Resupply");
  752.       NAME(FN,(First+SOff),T_LONG);
  753.       RANGE(0,1000000);
  754.       INC(100);
  755.     ENDFIELD;
  756.  
  757. ENDPAGE(12);
  758.  
  759.  
  760. PAGE(13);
  761.  
  762.   NEXTPAGE(10);
  763.   PREVPAGE(10);
  764.  
  765.   SETTITLE("TIE Fighter ("+FN+")","Battle 3, Battle on the Frontier (Scores)");
  766.   FIELDSPACE(50);
  767.   Fieldstart(100);
  768.  
  769.     INT SOff,First;
  770.  
  771.     SOff := 0;
  772.     First := 1050;
  773.  
  774.     FIELD("Mis 1, Load Base Equipment");
  775.       NAME(FN,(First+SOff),T_LONG);
  776.       RANGE(0,1000000);
  777.       INC(100);
  778.     ENDFIELD;
  779.  
  780.     SOff := (SOff+4);
  781.  
  782.     FIELD("Mis 2, Destroy Pirate Outpost");
  783.       NAME(FN,(First+SOff),T_LONG);
  784.       RANGE(0,1000000);
  785.       INC(100);
  786.     ENDFIELD;
  787.  
  788.     SOff := (SOff+4);
  789.  
  790.     FIELD("Mis 3, Hold Position");
  791.       NAME(FN,(First+SOff),T_LONG);
  792.       RANGE(0,1000000);
  793.       INC(100);
  794.     ENDFIELD;
  795.  
  796.     SOff := (SOff+4);
  797.  
  798.     FIELD("Mis 4, Guard Station NL-1, ");
  799.       NAME(FN,(First+SOff),T_LONG);
  800.       RANGE(0,1000000);
  801.       INC(100);
  802.     ENDFIELD;
  803.  
  804.     SOff := (SOff+4);
  805.  
  806.     FIELD("Mis 5, Thrawn Inspects NL-1");
  807.       NAME(FN,(First+SOff),T_LONG);
  808.       RANGE(0,1000000);
  809.       INC(100);
  810.     ENDFIELD;
  811.  
  812.     SOff := (SOff+4);
  813.  
  814.     FIELD("Mis 6, Wait For Relief Forces");
  815.       NAME(FN,(First+SOff),T_LONG);
  816.       RANGE(0,1000000);
  817.       INC(100);
  818.     ENDFIELD;
  819.  
  820.     SOff := (SOff+4);
  821.  
  822. ENDPAGE;  //  13
  823.  
  824.  
  825. PAGE(14);
  826.  
  827.   NEXTPAGE(10);
  828.   PREVPAGE(10);
  829.  
  830.   SETTITLE("TIE Fighter ("+FN+")","Battle 4, Conflict at Mylock IV (Scores)");
  831.   FIELDSPACE(60);
  832.   Fieldstart(100);
  833.  
  834.     INT SOff,First;
  835.  
  836.     SOff := 0;
  837.     First := 1082;
  838.  
  839.     FIELD("Mis 1, Escort Convoy");
  840.       NAME(FN,(First+SOff),T_LONG);
  841.       RANGE(0,1000000);
  842.       INC(100);
  843.     ENDFIELD;
  844.  
  845.     SOff := (SOff+4);
  846.  
  847.     FIELD("Mis 2, Attack the Nharwaak");
  848.       NAME(FN,(First+SOff),T_LONG);
  849.       RANGE(0,1000000);
  850.       INC(100);
  851.     ENDFIELD;
  852.  
  853.     SOff := (SOff+4);
  854.  
  855.     FIELD("Mis 3, Defend Tech Centre");
  856.       NAME(FN,(First+SOff),T_LONG);
  857.       RANGE(0,1000000);
  858.       INC(100);
  859.     ENDFIELD;
  860.  
  861.     SOff := (SOff+4);
  862.  
  863.     FIELD("Mis 4, Diplomatic Meeting");
  864.       NAME(FN,(First+SOff),T_LONG);
  865.       RANGE(0,1000000);
  866.       INC(100);
  867.     ENDFIELD;
  868.  
  869.     SOff := (SOff+4);
  870.  
  871.     FIELD("Mis 5, Rebel Arms Deal");
  872.       NAME(FN,(First+SOff),T_LONG);
  873.       RANGE(0,1000000);
  874.       INC(100);
  875.     ENDFIELD;
  876.  
  877. ENDPAGE(14);
  878.  
  879.  
  880. PAGE(15);
  881.  
  882.   NEXTPAGE(10);
  883.   PREVPAGE(10);
  884.  
  885.   SETTITLE("TIE Fighter ("+FN+")","Battle 5, Battle for Honor (Scores)");
  886.   FIELDSPACE(60);
  887.   Fieldstart(100);
  888.  
  889.     INT SOff,First;
  890.  
  891.     SOff := 0;
  892.     First := 1114;
  893.  
  894.     FIELD("Mis 1, Mineclearing");
  895.       NAME(FN,(First+SOff),T_LONG);
  896.       RANGE(0,1000000);
  897.       INC(100);
  898.     ENDFIELD;
  899.  
  900.     SOff := (SOff+4);
  901.  
  902.     FIELD("Mis 2, Assault Gunboat Recon");
  903.       NAME(FN,(First+SOff),T_LONG);
  904.       RANGE(0,1000000);
  905.       INC(100);
  906.     ENDFIELD;
  907.  
  908.     SOff := (SOff+4);
  909.  
  910.     FIELD("Mis 3, Convoy Attack");
  911.       NAME(FN,(First+SOff),T_LONG);
  912.       RANGE(0,1000000);
  913.       INC(100);
  914.     ENDFIELD;
  915.  
  916.     SOff := (SOff+4);
  917.  
  918.     FIELD("Mis 4, Tactical Superiority");
  919.       NAME(FN,(First+SOff),T_LONG);
  920.       RANGE(0,1000000);
  921.       INC(100);
  922.     ENDFIELD;
  923.  
  924.     SOff := (SOff+4);
  925.  
  926.     FIELD("Mis 5, Capture Harkov");
  927.       NAME(FN,(First+SOff),T_LONG);
  928.       RANGE(0,1000000);
  929.       INC(100);
  930.     ENDFIELD;
  931.  
  932. ENDPAGE(15);
  933.  
  934.  
  935. PAGE(16);
  936.  
  937.   NEXTPAGE(10);
  938.   PREVPAGE(10);
  939.  
  940.   SETTITLE("TIE Fighter ("+FN+")","Battle 6, Arms Race (Scores)");
  941.   FIELDSPACE(60);
  942.   Fieldstart(100);
  943.  
  944.     INT SOff,First;
  945.  
  946.     SOff := 0;
  947.     First := 1146;
  948.  
  949.     FIELD("Mis 1, Protect Prototypes");
  950.       NAME(FN,(First+SOff),T_LONG);
  951.       RANGE(0,1000000);
  952.       INC(100);
  953.     ENDFIELD;
  954.  
  955.     SOff := (SOff+4);
  956.  
  957.     FIELD("Mis 2, Prevent Rebel Ambush");
  958.       NAME(FN,(First+SOff),T_LONG);
  959.       RANGE(0,1000000);
  960.       INC(100);
  961.     ENDFIELD;
  962.  
  963.     SOff := (SOff+4);
  964.  
  965.     FIELD("Mis 3, Convoy Escort");
  966.       NAME(FN,(First+SOff),T_LONG);
  967.       RANGE(0,1000000);
  968.       INC(100);
  969.     ENDFIELD;
  970.  
  971.     SOff := (SOff+4);
  972.  
  973.     FIELD("Mis 4, Punative Raid");
  974.       NAME(FN,(First+SOff),T_LONG);
  975.       RANGE(0,1000000);
  976.       INC(100);
  977.     ENDFIELD;
  978.  
  979.     SOff := (SOff+4);
  980.  
  981. ENDPAGE;  //  16
  982.  
  983.  
  984. PAGE(17);
  985.  
  986.   NEXTPAGE(10);
  987.   PREVPAGE(10);
  988.  
  989.   SETTITLE("TIE Fighter ("+FN+")","Battle 7, Trechery at Ottega (Scores)");
  990.   FIELDSPACE(60);
  991.   Fieldstart(100);
  992.  
  993.     INT SOff,First;
  994.  
  995.     SOff := 0;
  996.     First := 1178;
  997.  
  998.     FIELD("Mis 1, Trap the Protector");
  999.       NAME(FN,(First+SOff),T_LONG);
  1000.       RANGE(0,1000000);
  1001.       INC(100);
  1002.     ENDFIELD;
  1003.  
  1004.     SOff := (SOff+4);
  1005.  
  1006.     FIELD("Mis 2, Destroy the Akaga");
  1007.       NAME(FN,(First+SOff),T_LONG);
  1008.       RANGE(0,1000000);
  1009.       INC(100);
  1010.     ENDFIELD;
  1011.  
  1012.     SOff := (SOff+4);
  1013.  
  1014.     FIELD("Mis 3, Retribution");
  1015.       NAME(FN,(First+SOff),T_LONG);
  1016.       RANGE(0,1000000);
  1017.       INC(100);
  1018.     ENDFIELD;
  1019.  
  1020.     SOff := (SOff+4);
  1021.  
  1022.     FIELD("Mis 4, TIE Defender");
  1023.       NAME(FN,(First+SOff),T_LONG);
  1024.       RANGE(0,1000000);
  1025.       INC(100);
  1026.     ENDFIELD;
  1027.  
  1028.     SOff := (SOff+4);
  1029.  
  1030.     FIELD("Mis 5, Save the Emperor");
  1031.       NAME(FN,(First+SOff),T_LONG);
  1032.       RANGE(0,1000000);
  1033.       INC(100);
  1034.     ENDFIELD;
  1035.  
  1036. ENDPAGE(17);
  1037.  
  1038.  
  1039.  
  1040.  
  1041.  
  1042.  
  1043.  
  1044.  
  1045.  
  1046. ABOUT
  1047. ^4^*^UTIE Fighter^U
  1048.  
  1049. Company:          Lucas Arts
  1050. Game Type:        Action Space Flight
  1051.                   Simulation
  1052. Medium:           Disk
  1053. Ram Nessasary:    2 megabytes
  1054. Hard Drive Space: 18 Megabytes
  1055. Machine Speed:    386-16MHz >
  1056. Sound Support:    Adlib,Sound Blaster,Roland
  1057. Add on Disk:      Defender of the Empire
  1058. Year of Release:  1994
  1059. Distributor:      Lucas Arts
  1060.  
  1061. TIE Fighter is the amaizing sequal to X-Wing.
  1062. In TIE fighter you switch alies to the Dark
  1063. Side, and fight for the Emperor. The graphics
  1064. engine has been improved to include Goraud
  1065. shaded space craft, of which there are six to
  1066. choose from. TIE Fighters, Interceptors,
  1067. Bombers, and Enhanced, Assualt Gun Boats,
  1068. and a new TIE Defender. Also, for anyone who
  1069. has read Tomothy Zahn's "Hier to the Empire"
  1070. series, Admiral Thrawn has been included in
  1071. the game.
  1072.  
  1073.  
  1074. Features of this DEFinition include:
  1075.  
  1076. - ANYTHING! Duty Status, Rank, Difficulty
  1077.   level, Score, Pilot Rating, Secret Order
  1078.   Ranking, Number of Kills, Number of
  1079.   Captures, Number of Crafts Lost, Training
  1080.   Levels, Training Scores, Historical
  1081.   Mission Levels and Scores for any and/or
  1082.   all Ship Types, Battle Status, Mission
  1083.   Selecting, And Mission Scores. WHIEW!
  1084.  
  1085. ^4TIE Fighter Game (C)1994,
  1086. ^4LucasArts Entertainment Company.
  1087. ^4All rights reserved.
  1088. ^U
  1089.  
  1090.              ^P"YSSgh.PCC"
  1091. ENDABOUT;
  1092.  
  1093.  
  1094.  
  1095.  
  1096.  
  1097.  
  1098. DIALOG("HLP");
  1099. ^T"XP"
  1100. ^E^UExperience^U
  1101.  
  1102. Experience is what determines what kind
  1103. of rating you get. As your Experience goes
  1104. up, You become a better pilot. The
  1105. following table shows what experience you
  1106. need for each rating:
  1107.  
  1108.          Rookie:        0 - 16999
  1109.          Officer:   17000 - 32999
  1110.          Veteran:   33000 - 49000
  1111.          Ace:       50000 - 65534
  1112.          Super Ace: 65535 and up.
  1113.  
  1114.  
  1115. ^T"MISC"
  1116. ^E^UEdit Misc.^U
  1117.  
  1118. This button will let you edit misc. info
  1119. on the selected pilot, including Score,
  1120. Experience, Duty Status and a whole bunch
  1121. of other stuff as well.
  1122.  
  1123. ^T"TRAIN"
  1124. ^E^UEdit Training Stats.^U
  1125.  
  1126. This button will let you edit all the info
  1127. pertaining to the maze levels, including
  1128. which ones have been completed, for what
  1129. ships, and with what score.
  1130.  
  1131. ^T"HIST"
  1132. ^E^UEdit Training Stats.^U
  1133.  
  1134. This button will let you edit all the info
  1135. pertaining to the Historical Missions,
  1136. including which ones have been completed,
  1137. for what ships, and with what score.
  1138.  
  1139. ^T"WAR"
  1140. ^E^UEdit War Status^U
  1141.  
  1142. This button will let you edit all data
  1143. pertaining to how far you've progressed
  1144. in the war against the Rebels. Including
  1145. Which Battles have been started, Which
  1146. Missions have been completed, and with
  1147. what score.
  1148.  
  1149. ^T"TLVL"
  1150. ^E^UEditing Training Stats.^U
  1151.  
  1152. The fields on the left indicate the last
  1153. level successfully completed. After
  1154. completing level 4 each ship you receive
  1155. a medal. The fields on the right show your
  1156. score for each ship type.
  1157.  
  1158. ^T"HISTPAGE"
  1159. ^E^UEditing Historical Missions^U
  1160.  
  1161. The fields on the left indicate which
  1162. missions have been successfully completed.
  1163. The fields on the right show your
  1164. score for each mission. The title at the
  1165. top shows which ship is beeing edited,
  1166. and the Nextpage buton will advance to
  1167. the next ship type.
  1168.  
  1169. ^T"WARPAGE"
  1170. ^E^UEditing War Status^U
  1171.  
  1172. This page lets you edit where you are in each
  1173. of the battles in the game. The fields on the
  1174. left indicate the status of the apropriate
  1175. missions. Inactive means you can't play it,
  1176. Active means the missions are available to be
  1177. played, Pending means the battle isn't
  1178. available, (this was put into TIE fighter to
  1179. make room for the add-on disks), Done means
  1180. all the missions hade been completed for the
  1181. corresponding battle. When you complete all
  1182. the missions for a battle, you get a medal.
  1183. Note: You still have to complete certain
  1184. battles before you can fight others. eg. If
  1185. you want to play the last mission of battle
  1186. 7, you must have battle 6 marked as Done.
  1187.  
  1188. The centre fields show the last mission
  1189. completed for the corresponding battle. Note:
  1190. If the number in this field is 3, then the
  1191. next mission you'd fight would be mission 4.
  1192.  
  1193. The buttons on the right serve as lables for
  1194. the battles, and when pressed, will bring up
  1195. a brief description of all the missions, an
  1196. will let you edit your score for them.
  1197.  
  1198.  
  1199. ENDDIALOG;
  1200.  
  1201.  
  1202.  
  1203.  
  1204.